home *** CD-ROM | disk | FTP | other *** search
/ The Rolling Stones: Shine a Light (Press Kit) / Shine a Light (Press Kit).iso / pc / program.dxr / Internal_27_Megabyte Counter.ls < prev    next >
Encoding:
Text File  |  2008-03-03  |  2.8 KB  |  89 lines
  1. global gphotolist, gImages, gMegs
  2.  
  3. on megaHandler
  4.   sort(gphotolist)
  5.   gMegs = 0
  6.   repeat with m = 1 to gphotolist.count
  7.     megaSize = getAt(gphotolist, m)
  8.     case megaSize of
  9.       "C01":
  10.         gMegs = gMegs + 26.89999999999999858
  11.       "C02":
  12.         gMegs = gMegs + 24.89999999999999858
  13.       "C03":
  14.         gMegs = gMegs + 13.90000000000000036
  15.       "C04":
  16.         gMegs = gMegs + 11.19999999999999929
  17.       "C05":
  18.         gMegs = gMegs + 9.5
  19.       "C06":
  20.         gMegs = gMegs + 11.40000000000000036
  21.       "C07":
  22.         gMegs = gMegs + 12.69999999999999929
  23.       "C08":
  24.         gMegs = gMegs + 7.5
  25.       "C09":
  26.         gMegs = gMegs + 10.90000000000000036
  27.       "C10":
  28.         gMegs = gMegs + 4.70000000000000018
  29.       "C11":
  30.         gMegs = gMegs + 12.90000000000000036
  31.       "C12":
  32.         gMegs = gMegs + 9.59999999999999964
  33.       "C13":
  34.         gMegs = gMegs + 9.30000000000000071
  35.       "C14":
  36.         gMegs = gMegs + 1.39999999999999991
  37.       "C15":
  38.         gMegs = gMegs + 9
  39.       "C16":
  40.         gMegs = gMegs + 7.59999999999999964
  41.       "C17":
  42.         gMegs = gMegs + 10.59999999999999964
  43.       "C18":
  44.         gMegs = gMegs + 17.89999999999999858
  45.       "C19":
  46.         gMegs = gMegs + 11.19999999999999929
  47.       "C20":
  48.         gMegs = gMegs + 5.20000000000000018
  49.       "C21":
  50.         gMegs = gMegs + 5
  51.       "C22":
  52.         gMegs = gMegs + 13.59999999999999964
  53.       "C23":
  54.         gMegs = gMegs + 11.69999999999999929
  55.       "C24":
  56.         gMegs = gMegs + 21.5
  57.       "C25":
  58.         gMegs = gMegs + 10.80000000000000071
  59.       "C26":
  60.         gMegs = gMegs + 69.90000000000000568
  61.       "C27":
  62.         gMegs = gMegs + 70.29999999999999716
  63.       "C28":
  64.         gMegs = gMegs + 74.79999999999999716
  65.       "C29":
  66.         gMegs = gMegs + 6
  67.       "C30":
  68.         gMegs = gMegs + 12
  69.       "C31":
  70.         gMegs = gMegs + 29
  71.       "C32":
  72.         gMegs = gMegs + 29
  73.       "C33":
  74.         gMegs = gMegs + 29
  75.     end case
  76.   end repeat
  77.   gImages = gphotolist.count
  78.   if gImages = 1 then
  79.     put "You have selected " & gImages & " image, which will take up approximately " & integer(gMegs) & " Megabytes of space on your hard drive." & RETURN & RETURN & "By default, a folder named 'Shine A Light Images' will be created on your desktop." & RETURN & RETURN & "If you would like to change the location of this folder, select the 'Change Folder Location' button below." into member "Save Text"
  80.   else
  81.     put "You have selected " & gImages & " images, which will take up approximately " & integer(gMegs) & " Megabytes of space on your hard drive." & RETURN & RETURN & "By default, a folder named 'Shine A Light Images' will be created on your desktop." & RETURN & RETURN & "If you would like to change the location of this folder, select the 'Change Folder Location' button below." into member "Save Text"
  82.   end if
  83. end
  84.  
  85. on exitFrame
  86.   megaHandler()
  87.   go(the frame)
  88. end
  89.